﻿Public Class DocumentEditor
    Inherits RichTextBox

    Public FileChanged As Boolean = False

    Private Sub DocumentEditor_TextInput(ByVal sender As Object, ByVal e As System.Windows.Input.TextCompositionEventArgs) Handles Me.TextInput
        If FileChanged = False Then
            FileChanged = True
        End If
    End Sub
End Class